home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
MacWorld 1996 April
/
Macworld (1996-04).dmg
/
Educational Demos
/
Goldilocks Gamebook
/
Goldilocks.DIR
/
00532_Script_532
< prev
next >
Wrap
Text File
|
1995-11-20
|
613b
|
25 lines
-- Play Game
on mouseDown
global MC
puppetSound "Click.AIF"
put mouseCast() into MC
repeat while stillDown() = 1
if mouseCast() = MC then
set the castNum of sprite (the ClickOn) to MC +1
updateStage
next repeat
end if
if (mouseCast() <> MC + 1) then set the castNum of sprite (the ClickOn) to MC
updateStage
end repeat
end
on mouseUp
global MC,pageCount
set the castNum of sprite (the clickOn) to MC
updateStage
if the mouseCast = MC or the mouseCast = MC + 1 then
-- go to game
end if
end